home *** CD-ROM | disk | FTP | other *** search
/ Acorn User: China / Acorn User China CD-ROM (UK) (Disc B) / Acorn User China CD-ROM (UK) (Disc B).bin / STUTTGART / FROMUTS / UNIXLIB37B / src_c_strlen < prev    next >
Encoding:
C/C++ Source or Header  |  1990-09-26  |  378 b   |  24 lines

  1. #ifdef __STDC__
  2. static char sccs_id[] = "@(#) strlen.c 1.0 "__DATE__" HJR";
  3. #else
  4. static char sccs_id[] = "@(#) strlen.c 1.0 26/9/90 HJR";
  5. #endif
  6.  
  7. /* strlen.c (c) Copyright 1990 H.Rogers */
  8.  
  9. #include <string.h>
  10.  
  11. #ifdef __STDC__
  12. size_t strlen(register const char *s)
  13. #else
  14. size_t strlen(s)
  15. register const char *s;
  16. #endif
  17. {
  18. register size_t n = 0;
  19.  
  20. while (*s++) n++;
  21.  
  22. return(n);
  23. }
  24.